Computer Life 1997 February/Computer Life February 1997.iso/S/wws9530/Product/WORDSRCH.EXE/0/RCDATA/TMYORDER/TMYORDER.txt

Text File | 1996-03-09 | 13KB | 708 lines

object MyOrder: TMyOrder
  Left = 238
  Top = 109
  BorderStyle = bsDialog
  Caption = 'Order Entry'
  ClientHeight = 445
  ClientWidth = 632
  Font.Color = clBlack
  Font.Height = -15
  Font.Name = 'Arial'
  Font.Style = []
  PixelsPerInch = 120
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  OnShow = FormShow
  TextHeight = 17
  object Bevel2: TBevel
    Left = 4
    Top = 180
    Width = 269
    Height = 173
    Shape = bsFrame
    Style = bsRaised
  end
  object Bevel1: TBevel
    Left = 4
    Top = 4
    Width = 517
    Height = 173
    Shape = bsFrame
    Style = bsRaised
  end
  object Label1: TLabel
    Left = 12
    Top = 12
    Width = 81
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Name'
  end
  object Label2: TLabel
    Left = 12
    Top = 40
    Width = 81
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Company'
  end
  object Label3: TLabel
    Left = 408
    Top = 152
    Width = 29
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Fax'
  end
  object Label4: TLabel
    Left = 12
    Top = 152
    Width = 81
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Work Phone'
  end
  object Label5: TLabel
    Left = 12
    Top = 124
    Width = 81
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Province'
  end
  object Label6: TLabel
    Left = 12
    Top = 96
    Width = 81
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'City'
  end
  object Label7: TLabel
    Left = 12
    Top = 68
    Width = 81
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Address'
  end
  object Visa: TImage
    Left = 528
    Top = 4
    Width = 97
    Height = 60
    Picture.Data = {<image000.bmp>}
    Stretch = True
  end
  object MasterCard: TImage
    Left = 528
    Top = 72
    Width = 97
    Height = 60
    Picture.Data = {<image001.bmp>}
    Stretch = True
  end
  object Amex: TImage
    Left = 528
    Top = 140
    Width = 97
    Height = 60
    Picture.Data = {<image002.bmp>}
    Stretch = True
  end
  object Discover: TImage
    Left = 528
    Top = 208
    Width = 97
    Height = 60
    Picture.Data = {<image003.bmp>}
    Stretch = True
  end
  object Label8: TLabel
    Left = 248
    Top = 96
    Width = 45
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'State'
  end
  object Label9: TLabel
    Left = 264
    Top = 124
    Width = 69
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Country'
  end
  object Label10: TLabel
    Left = 204
    Top = 152
    Width = 89
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Home Phone'
  end
  object Zip: TLabel
    Left = 360
    Top = 96
    Width = 37
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Zip'
  end
  object Label11: TLabel
    Left = 8
    Top = 188
    Width = 77
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Quantity'
  end
  object Label12: TLabel
    Left = 8
    Top = 216
    Width = 77
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Currency'
  end
  object Label13: TLabel
    Left = 8
    Top = 244
    Width = 77
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Shipping'
  end
  object Label14: TLabel
    Left = 8
    Top = 272
    Width = 77
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Payment'
  end
  object CredCardLab: TLabel
    Left = 8
    Top = 300
    Width = 77
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Cred Card'
  end
  object ExpLab: TLabel
    Left = 8
    Top = 328
    Width = 77
    Height = 17
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Exp Date'
  end
  object Bevel3: TBevel
    Left = 276
    Top = 180
    Width = 245
    Height = 173
    Shape = bsFrame
    Style = bsRaised
  end
  object Label16: TLabel
    Left = 284
    Top = 184
    Width = 101
    Height = 17
    Alignment = taCenter
    AutoSize = False
    Caption = 'Source'
  end
  object Label18: TLabel
    Left = 400
    Top = 184
    Width = 113
    Height = 17
    Alignment = taCenter
    AutoSize = False
    Caption = 'Name of Source'
  end
  object Label19: TLabel
    Left = 284
    Top = 236
    Width = 221
    Height = 17
    Alignment = taCenter
    AutoSize = False
    Caption = 'Comments'
  end
  object Panel1: TPanel
    Left = 4
    Top = 356
    Width = 517
    Height = 85
    Color = clTeal
    TabOrder = 27
    object Label20: TLabel
      Left = 4
      Top = 4
      Width = 65
      Height = 16
      AutoSize = False
      Caption = 'Remit To:'
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Company1: TLabel
      Left = 72
      Top = 4
      Width = 289
      Height = 16
      AutoSize = False
      Caption = 'Company1'
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Company2: TLabel
      Left = 72
      Top = 20
      Width = 289
      Height = 16
      AutoSize = False
      Caption = 'Company2'
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Company3: TLabel
      Left = 72
      Top = 36
      Width = 289
      Height = 16
      AutoSize = False
      Caption = 'Company3'
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Company4: TLabel
      Left = 72
      Top = 52
      Width = 289
      Height = 16
      AutoSize = False
      Caption = 'Company4'
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Company5: TLabel
      Left = 72
      Top = 68
      Width = 289
      Height = 16
      AutoSize = False
      Caption = 'Company5'
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Price: TLabel
      Left = 368
      Top = 4
      Width = 49
      Height = 16
      AutoSize = False
      Caption = 'Price:'
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Label21: TLabel
      Left = 368
      Top = 20
      Width = 49
      Height = 16
      AutoSize = False
      Caption = 'S&&H:'
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Label22: TLabel
      Left = 368
      Top = 36
      Width = 41
      Height = 16
      AutoSize = False
      Caption = 'Tax:'
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Label23: TLabel
      Left = 368
      Top = 56
      Width = 49
      Height = 20
      AutoSize = False
      Caption = 'Total:'
      Font.Color = clBlack
      Font.Height = -17
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object PriceTotal: TLabel
      Left = 420
      Top = 56
      Width = 89
      Height = 20
      AutoSize = False
      Font.Color = clBlack
      Font.Height = -17
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object PriceFirst: TLabel
      Left = 420
      Top = 4
      Width = 93
      Height = 16
      AutoSize = False
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object PriceShipping: TLabel
      Left = 420
      Top = 20
      Width = 93
      Height = 16
      AutoSize = False
      Font.Color = clBlack
      Font.Height = -13
      Fo